ويضم المواضيع التالية: 


معالجة الأخطاء 
تنقيح الأخطاء في برنامجك 
الاستثناءات Exceptions‏ اصطیاد ا ومعالجتها 


معالجة الأخطاء 


متى نستخدم معالجات الأخطاء 

يمكنك استخدام معالجات الأخطاء في أي وضع يولد احتمال لحدوث خطأ يوقف تنفيذ البرنامج سواء كان ذلك الخطاً متوقعا أم غير 
متوقع. وبشكل عام تستخدم معالجات الأخطاء لإدارة أحداث خارجية قد تؤثر على مسار تنفيذ البرنامج كفشل في الوصول للشبكة أو قرص 
مضغوط غير موجود أو طابعة أو ماسح ضوئي غير مشغلين مثلا ومن هذه المشاكل المحتملة التي تحتاج إلى معالجات أخطاء: 


ه شبكة/انترنت مشكلة في المخدمات أو تجهيزات الاتصال 

ه قواعد بيانات عدم القدرة على إنشاء اتصال أو تنفيذ استعلام أو أن قاعدة البيانات تعيد خطأ ما 

ه سواقات الأقراص قرص غير مهيا أو مهيأ بصورة غير صحيحة أو قرص قابل للإزالة غير مدخل بشكل جيد 
ه أو قطاعات تالفة أو حتى قرص ملئ 

ه مشاكل المسارات مسار خاطئ أو غير صحيح 

ه مشاكل الطابعة طابعة مطفأة أو بدون ورق أو غير متوفرة لسبب ما 

مشاکل برمجیات مكونات أو مكتبات يعتمد عليها ملف للتنفيذ ناقصة أو غير منصبة بصورة صحيحة أو 
ه وجود تعارض أو عدم توافقية بين بعض المكتبات 

ه مشاكل أمان البرنامج يحاول القيام بعملية غير مسموحة أو أن المستخدم الذي يشغل البرنامج لا يمتلك 
ه الصلاحيات الكافية لإتمام تنفيذ العملية 

مشاکل ذاكرة مصادر نظام غير كافية 

ه مشاكل الحافظة مشاكل في تبادل البيانات مع حافظة ويندوز 

ه مشاكل منطقية مشاكل صيغة أو مشاكل منطقية لم يستطع المترجم كشفها 


Try ... Catch li 

كتلة الكود التي تستخدم لمعالجة أخطاء زمن التنفيذ تدعى Catch‏ ... رمآ حيث يمكنك كتابة عبارة ۲۲۷ ضمن إجراء معالجة 
الحدث قبل الكود الذي تتوقع أن يولد مشكلة وتليها مباشرة عبارة ءاه فإن حدث خطا في زمن التنفيذ فيتم تنفيذ مجموعة من العبارات 
ضمن كتلة اه تم ستنفذ مجموعة من العبارات الاختيارية في كتلة رااهم۴ كما يمكن في بعض الحالات تعشيش عدة بلوكات ... ۷٣آ‏ 
Catch‏ داخل بعضها و تكون الصيغة العامة لكتلة Ty ... Ca‏ 


Try 
Statements that might produce a run-time error 
العبارات الممكن أن تولد خطاً‎ 
Catch 
Statements to run if a run-time error OCCUrS 
العبارات التي تنفذ في حالة حدوث خطأ‎ 
Finally 
Optional statements to run whether an error occurs or not 
عبارات اختيارية ستنفذ إن حدث خطأ أم لا‎ 
End Try 


حيث تشكل عبارة ر٣٣‏ بداية تعريف معالجة الخطأً في حین أن العبارات ۷٣آ‏ و ٤a۸‏ و ۷٣آ‏ ۵ع هي عبارات إجبارية والعبارة رااهن۴ 
اختيارية. ويدعى الكود المتواجد بين عبارتي ۷إ و هع بالكود المحمي بسبب أن أخطاء زمن التنفيذ المتولدة ضمن ذلك الكود لا تتسبب 
في توقف البرنامج عن العمل 


فمتلا إن حاولنا فتح ملف صورة وتحميله في صندوق الصورة يمكننا وضع ذلك الكود ضمن كتلة Catch‏ ... ر٣‏ وذلك لحماية البرنامج من 
الأخطاء التي قد تحدث في زمن التنفيذ 


Try 
PictureBox1.Image = _ 
System.Drawing.Bitmap.FromFile("D:\FileOpen.bmp") 
Catch 


MsgBox("Please insert the disk in drive D") 
End Try 


والمثال التالي بيين لنا كيفية تعشيش كتل Try ... Cat‏ 
Try‏ 
PictureBox1.Image = _‏ 
System.Drawing.Bitmap.FromFile("D:\FileOpen.bmp")‏ 


Catch 
MsgBox("Please insert the disk in drive D, Then Click Ok") 
Try 
PictureBox1.I[mage = _ 
System.Drawing.Bitmap.FromFile("D:\FileOpen.bmp") 
Catch 
MsgBox("File Load feature disabled") 
End Try 
End Try 
E٣ الغرض‎ 
من الأغراض الموروثة المفيدة الباقية من نسخ فيجول بايزيك السابقة الغرض ۴ يته المخد بعلو مات مفصطة لمعالجة‎ 


الأخطاء لكل خطأ زمن تنفيذ يحدث في البرنامج ومع ذلك هناك طرق أحدث لإدارة الأخطاء في الفريموورك مثل الغرض |0٥١‏ معC٤×٤‏ 
القوي وتشكل الخصائص ۲٥ط‏ ٣ں E۲٣.‏ و Err.Descripti ٥۸‏ الخصائص الأكثر إفادة لتحديد أخطاء زمن التنفيغ فالخاصية ٣مطاصErr.NNu‏ 
تحتوي على رقم الخطاً الخاص بآخر خطأ زمن تنفيذ حدث مؤخرا والخاصية ١٩٥آاماا‌یه۴۲۲.0‏ تحتوي على رسالة قصيرة تطابق رقم 
الخطأً الذي حدث مؤخرا وتلك الخاصيتان تمكناك من التعرف على الأخطاء التي حدثت مؤخرا وتحديد الاستجابة المناسبة لها وقد تعطي 
المستخدم رسالة عن كيف يمكن أن يتصرف في حالة حدوث خطأ معين كما يمكنك تفريغ الخطأ بواسطة الطريقة Err.Clear‏ ولکن إن 
استخدمت الغرض E۲٣‏ داخل كتلة ة٤‏ فيصبح من غير الضروري تفريغ الخطأ لأنه لا يتم الدخول إلى كتلة ءج إلا إن حدث خطأً 
والمثال التالي يتعرف على عدة أخطاء زمن التنفيذ باستخدام الغرض ۴٣۲‏ 


Try 
PictureBox1.Image = _ 
System.Drawing. Bitmap.FromFile("D:\FileOpen.bmp") 
Catch When Err.Number = 53 'If File Not Found Error 
MsgBox("Check pathname and disk drive") 
Catch When Err.Number = 7 'If File Out Of Memory Error 
MsgBox("'Is this really a bitmap", , Err.Description) 
Catch 
MsgBox("Problem loading file", , Err.Description) 
End Try 


lıعبlرة Exit Try‏ 
وهي تستخدم للخروج من کتلة ۸ ھ) ... ر٣‏ بشکل مشابھ للعبارات ۴٥۲‏ †|×۴ و طں؟ ٤|×ع‏ المألوفة حیث باستخدامها تخرج كليا 
من کتلة ر٣‏ ولکن إن کان قسم رااھ ہ۴ موجودا فسیتم تنفیذہ ولکن عبارۃ ٣٣y‏ †|×ع تجعلك تقفز فوق بقية عبارات ۸ھ ... ر٣٣‏ الباقية 


Try 
If PictureBox1.Enabled = False Then Exit Try 
PictureBox1.Image = _ 
System.Drawing.Bitmap.FromFile("D:\fileopen.bmp") 
Catch 


Retries +=1 
If Retries <= 2 Then 

MsgBox("Please insert the disc in drive D") 
Else 


MsgBox("File Load feature disabled") 
Button1.Enabled = False 
End If 
End Try 


مقارنة معالجات الأخطاء مع التقنيات الدفاعية للبرمجة 
استخدام معالجات الأخطاء ليست الطريقة الوحيدة لحماية برنامجك من حدوث أخطاء زمن التنفيذ فقطعة الكود التالية تستخدم 
الطريقة وءا»ع.٠|ز۴‏ في مجال الأسماء ۱0.عءرك في مكتبة فئات الفريموورك للتأكد من أن الملف موجود فعلا قبل محاولة فتحه 


If file.Exists("D:\fileopen.bmp") Then 
PictureBox1.lImage = _ 
System.Drawing.Bitmap.FromFile("D:\fileopen.bmp") 
Else 
MsgBox("Cannot find fileopen.bmp on drive D.") 


End If 


في الكود السابق لا تعتبر عبارة ۴| معالج خطأ حقيقي لأنها لا تستطيع منع خطأ زمن التنفيذ من إيقاف تنفيذ البرنامج وبدلا عن ذلك فطريقة 
التحقق هذه التي يستخدمها بعض المبرمجين تدعى بالبرمجة الدفاعية. فهي تستخدم وظيفة مفيدة في مكتبة فئات الفريموورك للتأكد من العملية 
التي ستجري على الملف قبل محاولة فتحه الفعلية. وفي هذه الحالة خاصة فالتأكد من وجود الملف باستخدام الطريقة File.Exists‏ هي أسرع 
من انتظار فيجول بايزيك لإطلاق الاستثناء واستعادته من خطاً زمن التنفيذ باستخدام معالجات الأخطاء. 

وهنا يظهر لدينا سؤال: متى يجب علينا استخدام طريقة البرمجة الدفاعية ومتى يجب علينا استخدام معالجات الأخطاء؟ ويكون الجواب هو أنه 
يجب عليك استخدام مزيج من الطريقتين في كودك حيث تكون طريقة البرمجة الدفاعية هي الأكثر فعالية لمعالجة المشاكل المحتملة. وکما 
ذكرنا سابقا فالطريقة وءا×ع۴.ع|أ۴ أسرع من بلوك Catch‏ . .. ر٣‏ لمعالجة الأخطاء لذا فمن المنطقي استخدام تقنية البرمجة الدفاعية من أجل 
الأخطاء التي تتوقع حدوثها بشكل متكرر واستخدام التراكيب الخاصة بمعالجة الأخطاء إذا كان لديك أكثر من شرط لفحصه وتريد تزويد 
مستخدم برنامجك بعدد من الخيارات كاستجابة لذلك الخطاً كما تمكنك من معالجة الأخطاء التي قد لا تتوقعها. 


Debugging Your Application «dhجمlنرب تنقيح الأخطاء في‎ 


عند تطوير تطبيق ما يواجه المبرمج مشاكل وأخطاء تظهر أثناء التنفيذ أو الترجمة وتنقسم هذه الأخطاء إلى عدة أنواع: خطأً بالصيغة وهذا 
يسهل اكتشافه حيث لن يقوم ال ۲عاأم ٥"‏ بترجمة المشروع وتنفيذه إن وجد خطأً من هذا النوع وقد تعترض عليه بيئة التطوير أثناء كتابتك 
لشفرة البرنامج - خط أحمر تحت العبارة - وأخطاء وقت التنفيذ وهذه أخطاء طارئة تحدث أثناء تنفيذ البرنامج ويجب مراقبتها في الشيفرة 
وهنا نستخدم عبارة ۸ه ... رآ لحصر تلك الأخطاء وتجاوزها مثل عندما يحاول البرنامج فتح ملف قد يكون غير متوفر للفتح لأسباب 
متعددة مرتبطة ببيئة التشغيل ونوع آخر وهي أخطاء منطقية في الكود حيث تلاحظ أن صيغة الأوامر صحيحة ولكن البرنامج لا يقوم بالعمل 
کما یجب ففي هذه الحالة طرق تجاوز النوعين السابقين من المشاكل لن تفيدك وستضطر لاستخدام دوت التنقيح Debugging tools‏ لحصر 
وتصحيح تلك المشاكل وفيما يلي بعض التقاط التي تساعدك على استخدام هذه الأدرات لتجارز المشاكل من التوع الأخير 

يمكنك وضع نقاط التوقف واہام۴ )هع8 لإيقاف تنفيذ البرنامج عند سطر معين ويمكن بعد التوقف متابعة تنفيذ البرنامج باستخدام ۴11 
للمتابعة سطر سطر أو ۴5 لمتابعة تنفيذ البرنامج حيث يمكن وضع نقاط التوقف أو إزالتها باختيار البند ومهم )ء8 ماععه٦‏ من قائمة 
عuطعط‏ أو ضغط المفتاح ۴9 أو النقر على الهامش الرمادي بجانب السطر المراد التوقف عنده وتظهر دائرة حمراء بجانب السطر دلالة 
على وضع نقطة التوقف عنده 

لتشغيل البرنامج مع التنقیح اختر عہ اع start Debug‏ من قائمة عںطەD‏ أو اضغط ۴5 ولتشغليه بدون تيح |ختر start Without‏ 
Ctrl+F5 biضl şÎ Debugging‏ 

يمكنك ضغط المفتاح ۴11 لبدء البرنامج مع التنقيح سطر سطر 

اضغط ۴11 سترى أنك قد انتقلت لأول سطر كود سيتم تنفيذه ولمتابعة تنفيذ البرنامج سطر سطر تابع ضغط ۴11 سترى في كل مرة أنه قد 
نفذ سطرا آخر من البرنامج حيث يمكنك استخدام هذه الطريقة للفهم الدقيق لكيفية تنفيذ البرنامج كما أن ۴10 تقوم بنفس عمل ۴11 تقريبا إلا 
أنها إذا واجهت إجراء ضمن الكود الذي يتم تنقيحه فإنها تمرر التنفيذ للسطر التالي فورا دون المرور بتنفيذ ذلك الإجراء سطر سطر كما 
تفعل ۴11 التى تنتقل لذلك الإجراء وتنفذه سطر سطر قبل العودة لتنفيذ باقى الكود المستدعى للإجراء 

يمكنك إيقاف تنفيذ البرنامج وذلك إما بالضغط على زر التوقف من شریط الأدوات أو 6۴-۴5 

اضغط ۴5 لتشغيل البرنامج وبهذا يبدأ تشغيل المنقح ويستمر تنفيذ الكود حتى يمر على نقطة توقف ”ام٣۴‏ )هع8۲ وعندها يتوقف عند 
السطر المحدد بنقطة التوقف المحددة سابقا وبينما أنت في وضع التوقف يمكنك متابعة بيانات الفئات في البرنامج عبر نافذتي sماںA‏ و 
Locals‏ 

نافذة واهعه| تريك جميع المتغيرات المعرفة ضمن مجال التنفيذ الحالي حيث يمكنك استخدامها لرؤية جميع خصائص تلك المتغيرات وقيمها 
ونافذة وم۸ تعمل بطريقة مشابهة ولكنها ترينا متغيرات قد لا تكون معرفة ضمن مجال التنفيذ الحالي 

إذا أوقفت مؤشر الفأرة فوق متغير أو خاصية ما وأنت في وضع التوقف ستلاحظ ظهور نافذة صغيرة تظهر لك تلك الخاصية وقيمتها 
ويمكنك عند الحاجة تغيير تلك الخاصية بالنقر المزدوج عليها وكتابة قيمة جديدة أو الضغط بزر الفأرة اليميني عليها ثم اختيار عں ا۷ ٤di‏ 
من القائمة وتغيير تلك القيمة حيث يمكنك بعدها متابعة التنقيح باستخدام ۴11 

لتغيير السطر التالي الذي سيتم تنفيذ الكود عنده فقط انقر بزر الفأرة اليميني على الخاصية واختر من القائمة Set Next Statement‏ 
ستلاحظ تغير مكان السهم الأصفر الذي يدل على السطر التالي الذي سيتم تنفيذه 

عندما توقف مؤشر الفأرة في وضع التوقف فوق نوع بيانات مركب متل م" التي ند تشير للفئة الحالية مثلا أو متغير يشير إلى فئة أو تركيب 
ما أو قد يشير إلى 6ء034 مثلا يمكنك بالضغط على إشارات + لتنقل ورؤية جميع خصائص تلك الفئة أو نوع البيانات المركب أو تغبيرها 
وذلك بنفس الطريقة التي تستخدمها للتنقل بين عناصر wWعi 1۲٥٥۷‏ 

إذا أردت تنفيذ البرنامج حتى يصل لسطر معين يمكنك فعل ذلك مباشرة بدون الضغط على ۴11 للتنفيذ وذلك بالضغط بزر الفأرة اليميني 
على ذلك السطر واختیار r٣میاں) t٥‏ م ں۴ حيث سيتم تنفيذ البرنامج حتى ذلك السطر 

لمراقبة قيمة متغير بشكل مستمر نستخدم سملہ اس طع†ةW‏ حيث يمكنك النقر بزر الفأرة اليميني على ذلك المتغير واختيlر Add Watch‏ 
حيث يمكنك رؤية ذلك المتغير ورؤية قيمته أو تغييرها مباشرة من تلك النافذة و بنفس الطريقة يمكنك أيضا إضافة ة۷ لأحد العناصر 
المركبة ورؤية أو تغيير قيمة إحدى خصائصه 

لإزالة متغير من نافذة اج فقط انقر بزر الفأرة اليميني عليه في تلك النافذö‏ وlختûر Delete Watch‏ 

كما يمكنك كتابة اسم المتغير مباشرة في نافذة طءجس لمراقبته 

فى حالة وجود كمية بيانات كبيرة أو بنية بيانات معقدة داخل المتغير كبيانات 1× مثلا يمكنك ملاحظة أيقونة مكبرة بجانب تلك القيمة حيث 
يمكتك إا الفط على النكرة سائرة لعرض الانات أو اثر على الس السغر بجاتها لأختار طرة خرص تلك الياات من الفقة 
حيث يمكنك اختيار ٣عzااجںء۷İ‏ ا"× مثلا في حالة بيانات من نوع ×M1‏ 

يمكنك استخدام نقاط التعقب اه٥ ٠٥‏ ه٣1‏ ليقوم المنقح بتنفيذ عمل معين عند وصوله لهذه النقطة دون إيقاف تنفيذ البرنامج أو مع إيقاف 
التنفيذ 

لوضع نقطة تعقب "٤‏ أمم هه٣1‏ انقر بزر الفارة اليميني على سطر الكود ثم من القائمة فر عي Insert Tracepoint رڙتۃخl Breakpoint‏ 
وهذا يؤدي إلى ظهور مربع حوار ا1٣‏ ءا When Breakمoi n‏ الذي يمكنك من تحديد ماذا تريد أن يفعل عندما يصل التنفيذ لذلك السطر 
حيث يوفر لك إمكانية طباعة رسالة أو تنفيذ ماكرو بالإضافة إلى خيار لاستمرار التنفيذ أو إيقافه عند ذلك السطر كما يمكنك استخدام تعابير 
معينة لإظهار قيم خاصة في سطر الرسالة مثل $۲۱٣)‏ لإظهار استخدام المعالج أو "N۸٤‏ لإظهار اسم مسار التنفيذ الحالي Current‏ 
hre Name‏ وعند ضبطها ستلاحظ ظهور معين أحمر بجانب السطر دلالة على ام۴ ٤٥‏ ه٣1‏ عوضا عن الدائرة الحمراء التي تشير 
Break Point‏ وستظھر الرسائل المتعلقة ب Trace Point‏ في liفذةö Output‏ 


الاستثناءات Exceptions‏ اصطیاد الأخطاء ومعالجتها 


التقاط استثناء معين 


لالتقاط استثناء نستعمل بلوك ry ... Catch‏ بشکل عام عندما ينفذ البرنامج عملية معينة قد تولد استثناء فلعمل ذلك نقوم بو ضع تلك الشيفذر 3 
البرمجية بين عبارتي إ٣‏ و ج و بعد العبارة ءج نستكشف الاستثناءات الحاصلة 


Try 
C= aê B 
Catch Ex as OverflowException 
Divided By Zero رiصض للبرنامج اكتشاف استثناء معين والرد عليه فمتلا يمكننا التقاط استثناء القسمة على‎ Catch «jجئll ویتیح‎ 
TEY 


C = A Mod B 
TextBox3.Text = C.ToString () 
Catch Ex as DividedByZeroException 


MsgBox ("Devided By Zero.") 


TextBox3.Text = "Infinity" 


End Try 
Overflow Exception jlضيف‎ ءliڎûتسl وبنفس الطريقة یمکننا استکشاف‎ 
Dim A, B, C As Integer 
Try 
A= TextBox1.text 


B = TextBox2.Text 


18 A + B 
Catch Ex as OverflowException 


MsgBox ("Overflow.") 
TextBox3.Text = "Infinity" 
End Try 


وحتى أيضا يمكننا استخدامه للكشف عن اسم ملف غير صالح 


Dim Fname As New String = "D:\Some Folder\FileName.ext" 
Dim Sfl as new StreamReader 
Try 
SfLl = New StreamReader (Fname) 
TextBox1.Text = Sfl1.ReadToEnd () 
Sfl.Close 
Catch Ex As FileNotFoundException 
MsgBox ("File Not Found") 
End Try 


فحص عدة استثناءات 
غلكما كن أن تزدي السلية الى تقر بخفيذها إلى عة اسكاء ات مكفة يمك قحي نة من الجمل وماوع لمعالجة فك الاستشاءات 


Dim FileDB As New OpenFileDialog () 


FILLéDB.Filter = "Al1 files | *.* | Text files | *.txt™ 
FileDB.FilterIndex = 2 

FileDB.InitialDirectory = "C:\Temp" 
FileDB.AddExtension = True 

FileDB.DefaultExt = "txt" 


' Prevent dialog box from validating file 
FileDB.CheckFileExists 
FileDB.CheckPathExists 


= False 


False 


If (FileDB.ShowDialog() = DialogResult.OK) Then 
Dim SourceFile As StreamReader 
Try 
SourceFile = New StreamReader (FileDB.FileName) 
TextBox1.Text = SourceFile.ReadToEnd () 
SourceFile.Close () 
Catch Except As DirectoryNotFoundException 
MsgBox ("Error: " & Except.Message) 
Catch Except As FileNotFoundException 
MsgBox ("Error: " & Except.Message) 
Catch Except As Exception 
MsgBox ("Error: " & Except.Message) 
End Try 
Else 
MsgBox ("User selected Cancel") 
End If 
معالجة الاستثناءات باستعمال بلوك طج٤ عام‎ 
عندما ينفذ كائن عملية نيابة عن البرنامج فقد يولد نطاقا واسعا من الاستثناءات بناء على سير تنفيذ البرنامج وقد لا تهمك ما هي هذه‎ 


الاستثناءات بقدر ما يهمك أنه قد حصل هناك استثناء ما ولمعالجة الاستثناءات بغخض النظر عن نوعها فإننا لانحدد استثناء معينا بل نستخدم 


Catch Ex as Exception 
مثال‎ 
Try 
ا‎ Some Code Here 
Catch Ex As Exception 
MsgBox ("Error: " & Ex.Message) 
End Try 


إجراء التنظرف بعد حدوث استثناء 

عند استعمالك لبلوك Try ... Catch‏ للرد على سلسلة من الاستثناءات ستنفذ عادة عمليات تخص كل استثناء ضمن بلوك ١ع‏ ج المناسب 
وبناء على الأمور التي يقوم بها برنامجك عليك القيام بعم لهات معينة بعد حدوث استثناء وذلك بغض النظر عن نوع الاستثناء ولهذا الغرض 
نستخدم عبارة رااه ذ۴ في نهاية بلوك ۸ه ... ر٣۲‏ تحدد الجمل التي نريد تنفيذها بغض النظر عن نوع الاستثناء مع ملاحظة أن العبارات 
الموجودة ضمن بلوك ۴٣21|‏ سيتم تنفيذها دوما بغض النظر عن حدوث استثناء أو لا 


Dim FileDB As New OpenFileDialog () 


FileDB.Filter "All files | *.* | Text files | *.txt" 


rIndex = 2 
alDirectory = "C:\Temp" 
tension = True 


FileDB.Filte 
FileDB.Initi 
FileDB.AddEx 
FileDB.DefaultExt = "txt" 


' Prevent dialog box from validating file 
FileDB.Check 
FileDB.Check 


FileExists = False 


PathExists = False 


howDialog() = DialogResult.OK) Then 
urceFile As StreamReader 


SourceFile = New StreamReader (FileDB.FileName) 
Except As Exception 

MsgBox ("Error: " & Except.Message) 

¥ 


t SourceFile Is Nothing) Then 
Try 


TextBox1.Text = SourceFile.ReadToEnd() 
Catch Except As Exception 


MsgBox ("Error: " & Except.Message) 
Finally 


MsgBox ("In finally statements") 
SourceFile.Close () 


End Try 


("User selected Cancel") 


(FileDB.S 
Dim So 


LEY 


Catch 


End TE 


If (No 


End If 


MsgBox 


End If 


Else 


If 


وفي بعض الحالات قد تكون هناك أوقات لا تريد استكمال تنفيذ البلوك ۸ه ... ر٣۲‏ عندها تستخدم العبارة ۲٣۷‏ ×۴ للخروج من البلوك 


حیث سینفذ بعدها أول سطر كود يلي ٣y‏ ۴"۵ 


ome Code 


Try 


S 


If SomeCondition Then Exit Try 


Hxception 


Of Try Block 


إطلاق استثناءاتك الخاصة 


Lch Ex as 


EXILE Try 


Rest 


Ca 


هناك أوقات تحتاج فيها لتكوين استثناء خاص بك عندها ستحتاج بكل بساطة لإنشاء فئة ووها٣‏ ترث الفئة - Exception‏ فعلی سبيل المتال 


یمکننا تولید استثناء باسم ٣0م 4EM ai | Exc‏ iاnva|‏ كما يلي 


Public Class InvalidEMailException 


ts System. Exception 


Inheri 


Sub New (ByVal Message As String) 
MyBase.New (Message) 

End Sub 

End Class 


و بالطبع يمكنك إنشاء طرق وخصائص في هذه الفئة حسب احتياجاتك كأي فئة أخرى وفي مثالنا المبسط هنا أنشأنا مشيد الفئة فقط وبعد 
إنشاء فئة الاستثناء الخاصة بنا يمكننا توليد الاستثناء باستخدام العبارة 10W‏ 


Throw New InvalidEMailException ("Envalid Email Please Correct™") 
وفيما يلي مثال آخر‎ 


Public Class MyException 
Inherits System.Exception 


Sub New (ByVal Message As String) 
MyBase.New (Message) 

End Sub 

End Class 


Public Class Forml 
Inherits System.Windows.Forms. Form 


Private Sub Buttonl Click (ByVal sender As Object, _ 
ByVal e As System.EventArgs) Handles Button1.Click 


TEY 
MsgBox ("About to generate custom exception") 
Throw (New MyException ("** Custom Message **")) 


Catch Ex As MyException 
MsgBox ("Custom Exception thrown " & Ex.Message) 


End Try 


End Sub 


End Class 


ترشيح الأخطاء في قسم ۸1۳# في بلوك 1۸۷ عند اصطياد الأخطاء 
يوفر لنا قسم عاج في بلوك ۲٣۷‏ أكثر من خيار لترشيح الأخطاء وإحدى هذه الطرق هي بتحديد نوع الخطأ المراد اصطياده وهنا يجب 
عليك البدء بالنوع الأكثر تحديدا منتهيا بالنوع الأكثر عمومية بما أن قسم ۸ه يتم تنفيذه بترتيب كتابته كما يمكن استخدام ۷٠"‏ في قسم 
at‏ لتحديد أكثر دقة مثل تحديد رقم خطاً معين حيث يمكنك دمج هذه الأساليب للحصول على الطريقة المناسبة لبرنامجك 
متال: 
TEY‏ 
خا تمك االن .ال تمل كوك ' 
Catch ex As System. IO. IOException‏ 
Ee E‏ لظا مغ اقا عل ,كوف ' 
Catch ex As System.NullReferenceException‏ 
Nu11ReferenceException‏ الخطأً مع للتفاعل كود ' 
Catch ex As Exception When Err.Number = 5 Or Err.Number = 8‏ 
8 أي 5 اطا رقم کون غندا .تافل كوة ' 
Catch ex As Exception‏ 
آخر خطا آى ملاعل وق ' 
EAS TEY‏ 


فيما يلي بعض فئات الأخطاء ووصف سريع لكل منها 


الفئة 


AmbiguousMatchException 
ApplicationException 


ArgumentException 
ArgumentNullException 
ArgumentOutOfRangeException 
ArithmeticException 
ArrayTypeMismatchException 
ConfigurationException 
ConstraintException 
DataException 
DirectoryNotFoundException 
DivideByZeroException 
DuplicateNameException 


EvaluateException 

Field AccessException 
FormatException 
IndexOutofRangeException 
InvalidCastException 
InvalidOperationException 
IOException 


EndOfStreamException 
FileLoadException 
FileNotFoundException 
InternalBufferOverflowException 
MemberAccessException 
MethodAccessException 
MissingFieldException 
Missing MemberException 
MissingMethodException 
NotlmplementedException 
NotSupportedException 
NullReferenceException 
OutOfMemoryException 


OverflowException 
RankException 
ReadOnlyException 
ResourceException 
SyntaxErrorException 
Unauthorized AccessException 


الوصف 


لم يستطع البرنامج تحديد آي نسخة من الدالة يستخدم 

هذه هي الفئة الأب لجميع فنات الأخطاء الغير قاتلة. فعندما تبني فئة استثناء خاصة بك يحب أن تكون 
موروتة من هذه الفئة 

القيمة الممررة غير صحيحة 

القيمة الممررة لا يمكن أن تكون لاشئ ومع ذلك قيمتها لاشئ 

القيمة الممررة خارج المجال المقبول 

خطأ إسناد أو تحويل في عملية حسابية 

البرنامج يحاول القيام بإادخال عنصر من نوع خاطئ في المصفوفة 

قيمة الإعداد غير صحيحة 

عملية البيانات تسبب خطأً في القيود على قاعدة البيانات 

الفئة الأب لجميع فئات الأخطاء المتعلقة ب .۸٤1‏ ۸50 

المجلد المطلوب غير موجود 

عملية .[N6)‏ ۸50 واجهت اسما مكررا. مثل آنك تحاول إنشاء جدول مع آنه يوجد جدول موجود سابقا 
ويملك نفس الاسم 

يحدث عندما لا يستطيع البرنامج تقييم قيمة التعبير الموجود في عمود قاعدة البيانات 
البرنامج يحاول الوصول إلى خاصية للفئة بطريقة غير صحيحة 

تنسيق القيمة الممررة غير صحيح 

البرنامج يحاول الوصول إلى عنصر يقع خارج حدود المصفوفة آو آي عنصر احتواء آخر 
البرنامج يحاول القيام بتحويل نوع غير صحيح 

العملية المطلوبة حاليا غير مسموح بها 

الفئة الأب لجميع فئات أخطاء الدخل/الخرج. 

وصل ال صهعع)؟ إلى نهايته 

خطا أثاء تخميل الملف 

لا يمكن إيجاد الملف المطلوب 

حدوث فیضان في Buffer I‏ الداخلي 

البرنامج يحاول الوصول إلى عنصر في فئة بطريقة غير صحيحة 

البرنامج يحاول الوصول إلى الطريقة بطريقة غير صحيحة 

البرنامج يحاول الوصول إلى خاصية غير موجودة في الفئة 

البرنامج يحاول الوصول إلى عنصر غير موجود في الفئة 

البرنامج يحاول الوصول إلى طريقة غير موجودة في الفئة 

العملية المطلوبة غير معرفة 

الفا المطا تة عير مد عة 

البرنامج يحاول استخدام مرجع إلى غرض اءءزط0 قيمته لاشئ 

لاتوجد ذاكرة كافية 

فمثلا إن كان المستخدم يحاول توليد مجموعة بيانات ضخمة يمكنك التنبؤ بحجم الذاكرة التي سيحتاجها 
البرنامج واختبار إن كانت متوفرة فتقوم برمي هذا الاستثناء إن لم تكن كافية 

خطاً فيضان في عملية حسابية 

الإجراء يحاول استخدام مصفوفة تملك عددا خاطنئا من الأبعاد 

البرنامج يحاول تعديل بيانات للقراءة فقط 

المصدر المطلوب مفقود 

خطاً فى الصيغة عند إسناد قيمة لخاصية 

النظام يمنع الوصول بسبب عدم كفاية الصلاحيات 


التقاط الاستثناءات الغير معالجة فى التطبيق 
في Events‏ icationاApp‏ يوجد الحدٿث ۸ ٥i0†مxce٤ed4اUnhand‏ الذي يستقبل جميع الاستثناءات الغير معالجة في التطبيق مع ملاحظة 
أنه عندما يصل الاستثناء لهذا الحدث فإن التطبيق سيتم إنهاؤه ولا يعود مسار التنفيذ لداخل التطبيق 


